Leadtools.Dicom.Common
LEAD Technologies, Inc

Macros Property

Example 





Gets or sets the macros.
Syntax
'Declaration
 
Public Property Macros As Dictionary(Of String,MacroSubsitutionDelegate(Of T))
'Usage
 
Dim instance As MacroProcessor(Of T)
Dim value As Dictionary(Of String,MacroSubsitutionDelegate(Of T))
 
instance.Macros = value
 
value = instance.Macros
 get_Macros();
set_Macros(value);

Property Value

The list of macros and delegates to be called to process the macro.
Example
Copy CodeCopy Code  
Public Sub MacroProcessorSample()
   Dim processor As New MacroProcessor(Of Object)()

   '
   ' add two macros to the macro processor
   '
   processor.Macros.Add("current_date", New MacroSubsitutionDelegate(Of Object)(AddressOf CurrentDateMacro))
   processor.Macros.Add("current_time", New MacroSubsitutionDelegate(Of Object)(AddressOf CurrentTimeMacro))

   '
   ' Process a macro string
   '
   Console.WriteLine(processor.Process(processor, "${current_date} ==> ${current_time}"))
End Sub

Private Function CurrentDateMacro(ByVal userData As Object, ByVal name As String, ByVal ParamArray parameters As Object()) As String
   Return DateTime.Now.ToShortDateString()
End Function

Private Function CurrentTimeMacro(ByVal userData As Object, ByVal name As String, ByVal ParamArray parameters As Object()) As String
   Return DateTime.Now.ToShortTimeString()
End Function
public void MacroProcessorSample()
{
   MacroProcessor<object> processor = new MacroProcessor<object>();

   //
   // add two macros to the macro processor
   //

   processor.Macros.Add("current_date", new MacroSubsitutionDelegate<object>(CurrentDateMacro));
   processor.Macros.Add("current_time", new MacroSubsitutionDelegate<object>(CurrentTimeMacro));

   //
   // Process a macro string
   //

   Console.WriteLine(processor.Process(processor, "${current_date} ==> ${current_time}"));
}

private string CurrentDateMacro(object userData, string name, params object[] parameters)
{
   return DateTime.Now.ToShortDateString();
}

private string CurrentTimeMacro(object userData, string name, params object[] parameters)
{
   return DateTime.Now.ToShortTimeString();
}
Requirements

Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

See Also

Reference

MacroProcessor<T> Class
MacroProcessor<T> Members

 

 


Products | Support | Contact Us | Copyright Notices

© 2006-2012 All Rights Reserved. LEAD Technologies, Inc.

Leadtools.Dicom.Common requires a Document or Medical toolkit license and unlock key. For more information, refer to: Imaging Pro/Document/Medical Features